home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1996 January / macformat-033.iso / mac / Shareware City / Developers / CGIshell Folder / Pocket 6.4 / Source / OtherResources.asm < prev    next >
Encoding:
Assembly Source File  |  1994-12-10  |  11.9 KB  |  427 lines  |  [TEXT/ASM ]
  1. ;  pForthRes.asm
  2. ; Fri Apr 29, 1988 09:47:46 v 0.4
  3. ; Mon May 27, 1991 15:53:35 update resources for 0.4.1
  4. ; Thu Jan 23, 1992 20:19:00 update resources for 0.5.2
  5. ; Sun Apr 12, 1992 23:58:00 update resources for 0.6
  6. ; Fri Jan 22, 1993 20:16:00 update resources for 0.6.2
  7. ; Thu Mar 04, 1993 19:57:00 change window position for Frontier window
  8. ; Wed Mar 24, 1993 23:11:00 new version experiments
  9. ; Fri Feb 10, 1994 22:05:40 bug fix version change 0.6.4
  10.  
  11. ; Version identification resource
  12. .ALIGN    2
  13. RESOURCE    'p4TH'    0 '' 32
  14.     DC.B    39,'Pocket Forth  0.6.4',13,'12/10/94  C.Heilman'
  15.  
  16. ; the WIND resource
  17. .ALIGN    2
  18. RESOURCE     'WIND' 128  'PocketForth'    32 ; purgable
  19.     DC.W    62,2,240,386    ; t,l,b,r
  20.     DC.W    4        ; no grow doc proc wo/zoom
  21.     DC.W    0        ; invisible
  22.     DC.W    $100        ; closable
  23.     DC.L    0
  24.     DC.B    12,'Pocket Forth'
  25.  
  26. ; MenuBar Resources
  27.  
  28. .ALIGN 2
  29. RESOURCE    'MENU'    1    'Apple Menu'
  30.     DC.W    1    ; Menu ID
  31.     DC.W    0    ; Width holder
  32.     DC.W    0    ; Height
  33.     DC.L    0    ; ID holder for std menu
  34.     DC.L    $FFFFFFFB
  35.     DC.B    1    ; Title length
  36.     DC.B    20    ; Apple symbol
  37.     
  38.     DC.B    19,'About Pocket Forth…'
  39.     DC.B    0    ; no icon
  40.     DC.B    0    ; no control key
  41.     DC.B    0    ; no marking character
  42.     DC.B    0    ; style
  43.  
  44.     DC.B    1    ; About length
  45.     DC.B    '-'
  46.     DC.B    0    ; no icon
  47.     DC.B    0    ; no control key
  48.     DC.B    0    ; no marking character
  49.     DC.B    0    ; style
  50.     
  51.     DC.B    0    ; End of this menu item
  52.     
  53. .ALIGN 2
  54. RESOURCE    'MENU'    2    'File Menu'
  55.     DC.W    2    ; Menu ID
  56.     DC.W    0    ; Width holder
  57.     DC.W    0    ; Height
  58.     DC.L    0    ; ID holder for std menu
  59.     DC.L    $15B    ; Enable 
  60.     DC.B    4    ; Title length
  61.     DC.B    'File'
  62.     
  63.     DC.B    5    ; Item text length
  64.     DC.B    'Open…'
  65.     DC.B    0    ; no icon
  66.     DC.B    'O'    ; control oh (that's the letter)
  67.     DC.B    0    ; no marking char
  68.     DC.B    0    ; plain style
  69.  
  70.     DC.B    1    ; Item text length
  71.     DC.B    '-'
  72.     DC.B    0    ; no icon
  73.     DC.B    0    ; no control key
  74.     DC.B    0    ; no marking char
  75.     DC.B    0    ; plain style
  76.  
  77.     DC.B    16    ; Item text length
  78.     DC.B    'Save Dictionary…'
  79.     DC.B    0    ; no icon
  80.     DC.B    'S'    ; no control key
  81.     DC.B    0    ; no marking char
  82.     DC.B    0    ; plain style
  83.  
  84.     DC.B    9    ; Item text length
  85.     DC.B    'Debugger…'
  86.     DC.B    0    ; no icon
  87.     DC.B    0    ; no control key
  88.     DC.B    0    ; no marking char
  89.     DC.B    0    ; plain style
  90.  
  91.     DC.B    1    ; Item text length
  92.     DC.B    '-'
  93.     DC.B    0    ; no icon
  94.     DC.B    0    ; no control key
  95.     DC.B    0    ; no marking char
  96.     DC.B    0    ; plain style
  97.  
  98.     DC.B    6    ; Item text length
  99.     DC.B    'Print…'
  100.     DC.B    0    ; no icon
  101.     DC.B    'P'    ; control P
  102.     DC.B    0    ; no marking char
  103.     DC.B    0    ; plain style
  104.  
  105.     DC.B    1    ; Item text length
  106.     DC.B    '-'
  107.     DC.B    0    ; no icon
  108.     DC.B    0    ; no control key
  109.     DC.B    0    ; no marking char
  110.     DC.B    0    ; plain style
  111.     
  112.     DC.B    4    ; Item text length
  113.     DC.B    'Quit'
  114.     DC.B    0    ; no icon
  115.     DC.B    'Q'    ; control Q
  116.     DC.B    0    ; no marking char
  117.     DC.B    0    ; plain style
  118.  
  119.     DC.B    0    ; End of this menu item
  120.  
  121. .ALIGN 2
  122. RESOURCE    'MENU'    3    'Edit Menu'
  123.     DC.W    3    ; Menu ID
  124.     DC.W    0    ; Width holder
  125.     DC.W    0    ; Height
  126.     DC.L    0    ; ID holder for std menu
  127.     DC.L    $7B    ; enable flags
  128.     DC.B    4    ; Title length
  129.     DC.B    'Edit'
  130.     
  131.     DC.B    4    ; Item text length
  132.     DC.B    'Undo'
  133.     DC.B    0    ; no icon
  134.     DC.B    'Z'    ; control Z
  135.     DC.B    0    ; no marking char
  136.     DC.B    0    ; plain style
  137.     
  138.     DC.B    1    ; Item text length
  139.     DC.B    '-'
  140.     DC.B    0    ; no icon
  141.     DC.B    0    ; no control key
  142.     DC.B    0    ; no marking char
  143.     DC.B    0    ; plain style
  144.     
  145.     DC.B    3    ; Item text length
  146.     DC.B    'Cut'
  147.     DC.B    0    ; no icon
  148.     DC.B    'X'    ; control ecks
  149.     DC.B    0    ; no marking char
  150.     DC.B    0    ; plain style
  151.     
  152.     DC.B    4    ; Item text length
  153.     DC.B    'Copy'
  154.     DC.B    0    ; no icon
  155.     DC.B    'C'    ; control C
  156.     DC.B    0    ; no marking char
  157.     DC.B    0    ; plain style
  158.  
  159.     DC.B    5    ; Item text length
  160.     DC.B    'Paste'
  161.     DC.B    0    ; no icon
  162.     DC.B    'V'    ; control V
  163.     DC.B    0    ; no marking char
  164.     DC.B    0    ; plain style
  165.  
  166.     DC.B    5    ; Item text length
  167.     DC.B    'Clear'
  168.     DC.B    0    ; no icon
  169.     DC.B    0    ; no control key
  170.     DC.B    0    ; no marking char
  171.     DC.B    0    ; plain style
  172.     
  173.     DC.B    0    ; End of Edit Menu
  174.  
  175. ; b&w icon resource
  176.     
  177. .ALIGN    2
  178. RESOURCE    'BNDL'    128 '' 32
  179.     DC.L    'p4TH'        ; signature
  180.     DC.W    0        ; resource id of sig.
  181.     DC.W    1        ; number of resource types -1
  182.  
  183.     DC.L    'FREF'
  184.     DC.W    1        ; number of mappings -1
  185.     DC.W    0,128        ; map 0 to fref 128
  186.     DC.W    1,129        ; map 1 to fref 129
  187.     
  188.     DC.L    'ICN#'
  189.     DC.W    1        ; number of mappings -1
  190.     DC.W    0,128        ; map 0 to icon 128
  191.     DC.W    1,0        ; map 1 to icon 0
  192.     
  193. .ALIGN    2
  194. RESOURCE    'FREF'    128 '' 32
  195.     DC.B    'APPL',0,0,0
  196.  
  197. RESOURCE    'FREF'    129 '' 32
  198.     DC.B    'TEXT',0,1,0
  199.  
  200. .ALIGN 2
  201. RESOURCE    'ICN#'     128 ' ' 32
  202.     ; icon
  203.     DC.L    $00007F80,$0001FFF0,$00033FF8,$00031FFC
  204.     DC.L    $00001FFE,$00001FFE,$00001FFF,$00FC3FFF
  205.     DC.L    $0F0223FF,$300221FF,$400238FF,$400254FF
  206.     DC.L    $818258FF,$8342803F,$8302407E,$8781383E
  207.     DC.L    $8301303C,$83012038,$87811E38,$8001017C
  208.     DC.L    $800100C2,$80010080,$AAA90130,$95520078
  209.     DC.L    $80020048,$EFFA0048,$380600FC,$800007EF
  210.     DC.L    $10000FFE,$02000FF0,$004B7FC0,$00000000
  211.     ; mask
  212.     DC.L    $00007F80,$0001FFF0,$00033FF8,$00031FFC
  213.     DC.L    $00001FFE,$00001FFE,$00001FFF,$00FC3FFF
  214.     DC.L    $0FFE3FFF,$3FFE3FFF,$7FFE3FFF,$7FFE7FFF
  215.     DC.L    $FFFE7FFF,$FFFEFFFF,$FFFE7FFE,$FFFF3FFE
  216.     DC.L    $FFFF3FFC,$FFFF3FF8,$FFFF1FF8,$FFFF01FC
  217.     DC.L    $FFFF00C2,$FFFF0080,$FFFF0130,$FFFE0078
  218.     DC.L    $FFFE0078,$FFFE0078,$380600FC,$800007FF
  219.     DC.L    $10000FFE,$02000FF0,$004B7FC0,$00000000
  220.  
  221. .ALIGN 2
  222. RESOURCE    'ICON'    128 ' ' 32
  223.     DC.W    $0000,$001E,$0000,$007B,$0000,$00F3,$0000,$3DF0
  224.     DC.W    $0000,$FFF8,$0000,$9FF8,$0000,$0FFC,$00FF,$187C
  225.     DC.W    $0F01,$1BBE,$7001,$14CE,$8001,$0327,$8000,$8721
  226.     DC.W    $8000,$89C1,$8000,$9080,$8000,$9E00,$8000,$8118
  227.     DC.W    $8000,$80E0,$8000,$8041,$8000,$803E,$8000,$4000
  228.     DC.W    $8000,$4000,$8000,$4000,$8000,$4000,$9554,$C0C0
  229.     DC.W    $AAA9,$01E0,$8001,$0120,$EFFD,$0120,$3803,$03F0
  230.     DC.W    $8000,$1F9C,$1000,$3FF8,$0200,$3FC0,$0049,$7F00
  231.  
  232. .ALIGN    2
  233. RESOURCE    'cicn'    128 ' ' 32
  234.     DC.W    $0000,$0000,$8010,$0000,$0000,$0020,$0020,$0000
  235.     DC.W    $0000,$0000,$0000,$0048,$0000,$0048,$0000,$0000
  236.     DC.W    $0004,$0001,$0004,$0000,$0000,$0000,$0000,$0000
  237.     DC.W    $0000,$0000,$0000,$0004,$0000,$0000,$0020,$0020
  238.     DC.W    $0000,$0000,$0004,$0000,$0000,$0020,$0020,$0000
  239.     DC.W    $0000,$0000,$001E,$0000,$007B,$0000,$00F3,$0000
  240.     DC.W    $3DF0,$0000,$FFF8,$0000,$9FF8,$0000,$0FFC,$00FF
  241.     DC.W    $1FFC,$0FFF,$1FFE,$7FFF,$17FE,$FFFF,$03FF,$FFFF
  242.     DC.W    $87FF,$FFFF,$8FFF,$FFFF,$9FFF,$FFFF,$9FFF,$FFFF
  243.     DC.W    $81FF,$FFFF,$80FF,$FFFF,$807F,$FFFF,$803E,$FFFF
  244.     DC.W    $C000,$FFFF,$C000,$FFFF,$C000,$FFFF,$C000,$FFFF
  245.     DC.W    $C0C0,$FFFF,$01E0,$FFFF,$01E0,$FFFF,$01E0,$3803
  246.     DC.W    $03F0,$8000,$1FFC,$1000,$3FF8,$0200,$3FC0,$0049
  247.     DC.W    $7F00,$0000,$001E,$0000,$007B,$0000,$00F3,$0000
  248.     DC.W    $3DF0,$0000,$FFF8,$0000,$9FF8,$0000,$0FFC,$00FF
  249.     DC.W    $187C,$0F01,$1BBE,$7001,$14CE,$8001,$0327,$8000
  250.     DC.W    $8721,$8000,$89C1,$8000,$9080,$8000,$9E00,$8000
  251.     DC.W    $8118,$8000,$80E0,$8000,$8041,$8000,$803E,$8000
  252.     DC.W    $4000,$8000,$4000,$8000,$4000,$8000,$4000,$9554
  253.     DC.W    $C0C0,$AAA9,$01E0,$8001,$0120,$EFFD,$0120,$3803
  254.     DC.W    $03F0,$8000,$1F9C,$1000,$3FF8,$0200,$3FC0,$0049
  255.     DC.W    $7F00,$0000,$0000,$0000,$000D,$0000,$FFFF,$FFFF
  256.     DC.W    $FFFF,$0001,$FFFF,$FFFF,$CCCC,$0002,$FFFF,$CCCC
  257.     DC.W    $9999,$0003,$CCCC,$9999,$6666,$0004,$3333,$6666
  258.     DC.W    $6666,$0005,$3333,$3333,$6666,$0006,$DDDD,$DDDD
  259.     DC.W    $DDDD,$0007,$8888,$8888,$8888,$0008,$7777,$7777
  260.     DC.W    $7777,$0009,$5555,$5555,$5555,$000A,$2222,$2222
  261.     DC.W    $2222,$000B,$FFFF,$FFFF,$0000,$000C,$DDDD,$0000
  262.     DC.W    $0000,$000F,$0000,$0000,$0000,$0000,$0000,$0000
  263.     DC.W    $0000,$0000,$0000,$0005,$5550,$0000,$0000,$0000
  264.     DC.W    $0000,$0000,$0000,$0555,$5055,$0000,$0000,$0000
  265.     DC.W    $0000,$0000,$0000,$5555,$0055,$0000,$0000,$0000
  266.     DC.W    $0000,$0055,$5505,$5555,$0000,$0000,$0000,$0000
  267.     DC.W    $0000,$5555,$5555,$5555,$5000,$0000,$0000,$0000
  268.     DC.W    $0000,$5005,$5555,$5555,$5000,$0000,$0000,$0000
  269.     DC.W    $0000,$0000,$5555,$5555,$5500,$0000,$0000,$FFFF
  270.     DC.W    $FFFF,$0005,$5111,$1555,$5500,$0000,$FFFF,$1111
  271.     DC.W    $111F,$0005,$51FF,$F155,$5550,$0FFF,$1111,$1222
  272.     DC.W    $223F,$0005,$0F00,$3311,$5550,$F111,$1222,$2222
  273.     DC.W    $223F,$0000,$0044,$0031,$1555,$F122,$2222,$2222
  274.     DC.W    $2223,$F000,$0FF4,$00C1,$1115,$F122,$2222,$2222
  275.     DC.W    $2223,$F000,$F11F,$FC11,$1115,$F122,$2222,$2222
  276.     DC.W    $2223,$F00F,$1111,$F122,$2211,$F122,$2222,$2222
  277.     DC.W    $2223,$F00F,$FFF1,$1222,$2222,$F122,$2222,$2222
  278.     DC.W    $2223,$F000,$000F,$222F,$F222,$F122,$2222,$2222
  279.     DC.W    $2223,$F000,$0000,$FFF2,$2222,$F122,$2222,$2222
  280.     DC.W    $2223,$F000,$0000,$0F22,$222F,$F122,$2222,$2222
  281.     DC.W    $2223,$F000,$0000,$00FF,$FFF0,$F122,$2222,$2222
  282.     DC.W    $2222,$3F00,$0000,$0000,$0000,$F122,$2222,$2222
  283.     DC.W    $2222,$3F00,$0000,$0000,$0000,$F122,$2222,$2222
  284.     DC.W    $2222,$3F00,$0000,$0000,$0000,$F122,$2222,$2222
  285.     DC.W    $2223,$3F00,$0000,$0000,$0000,$F177,$7777,$7777
  286.     DC.W    $7733,$FF00,$0000,$9700,$0000,$F177,$7777,$7777
  287.     DC.W    $773F,$0000,$0009,$9970,$0000,$F133,$3333,$3333
  288.     DC.W    $333F,$0000,$0009,$6690,$0000,$FFF3,$FFFF,$FFFF
  289.     DC.W    $FF3F,$0000,$0007,$6690,$0000,$00FF,$F000,$0000
  290.     DC.W    $00FF,$0000,$00F7,$9999,$0000,$F000,$0000,$0000
  291.     DC.W    $0000,$000F,$7779,$9BCF,$9F00,$000F,$0000,$0000
  292.     DC.W    $0000,$00F7,$8989,$99A9,$F000,$0000,$00F0,$0000
  293.     DC.W    $0000,$0099,$9999,$9F00,$0000,$0000,$0000,$0F00
  294.     DC.W    $F00F,$0FFF,$FFFF,$0000,$0000
  295.  
  296. ; alert resources
  297.  
  298. .ALIGN    2
  299. RESOURCE    'ALRT'    257    'About'
  300.     DC.W    50,50,188,242    ; t,l,b,r
  301.     DC.W    257        ; DITL ID number
  302.     DC.W    $4444        ; Stages ($4444 = just display)
  303.     DC.W    $A80A        ; autoposition center parent
  304.  
  305. .ALIGN    2
  306. RESOURCE    'DITL'    257    'About'
  307.     DC.W    3        ; Number of items -1
  308.     
  309.     ; Item number 1: the userItem 'button'
  310.     DC.L    0        ; handle holder
  311.     DC.W    0,0,144,210    ; t,l,b,r
  312.     DC.B    0        ; useritem
  313.     DC.B    0
  314.  
  315.     ; Item number 2: the info. pict
  316.     DC.L    0        ; handle holder
  317.     DC.W    29,16,123,179    ; t,l,b,r
  318.     DC.B    $40,2        ; disabled+pict,length of following field
  319.     DC.W    128        ; id of PICT resource
  320.  
  321.     ; item number 3: the icon
  322.     DC.L    0        ; handle holder
  323.     DC.W    12,140,44,172    ; t,l,b,r
  324.     DC.B    $A0,2        ; disabled+pict,length of following field
  325.     DC.W    128        ; id of PICT resource
  326.  
  327.     ; Item number 4: the hdlg
  328.     DC.L    0        ; handle holder
  329.     DC.W    $FFFE,$FFFE,$FFFE,$FFFE    ; off screen rect
  330.     DC.B    $81,4
  331.     DC.W    1,257        ; helpItem,id of hdlg
  332.  
  333. .ALIGN    2
  334. RESOURCE    'ALRT'    258    'RedAlert'
  335.     DC.W    170,15,265,325    ; t,l,b,r
  336.     DC.W    258        ; DITL ID number
  337.     DC.W    $4444        ; Stages
  338.     DC.W    $B00A        ; autoposition alert parent
  339.  
  340. .ALIGN    2
  341. RESOURCE    'DITL'    258    'RedAlert'
  342.     DC.W    1        ; Number of items -1
  343.  
  344.     ; Item number 1
  345.     DC.L    0        ; handle holder
  346.     DC.W    61,120,83,195    ; t,l,b,r
  347.     DC.B    4        ; type
  348.     DC.B    2,'Ok'
  349.  
  350.     ; Item number 2
  351.     DC.L    0        ; handle holder
  352.     DC.W    19,70,57,295    ; t,l,b,r
  353.     DC.B    136        ; type
  354.     DC.B    58,'An error occured, and the '
  355.     DC.B    'dictionary was not (re)entered. '
  356.  
  357. .ALIGN    2
  358. RESOURCE    'ALRT'    259    'SaveAlert'
  359.     DC.W    82,94,202,350    ; t,l,b,r
  360.     DC.W    259        ; DITL ID number
  361.     DC.W    $4444        ; Stages
  362.     DC.W    $B00A        ; autoposition alert parent
  363.  
  364. .ALIGN    2
  365. RESOURCE    'DITL'    259    'SaveAlert'
  366.     DC.W    3        ; Number of items -1
  367.  
  368.     ; Item number 1
  369.     DC.L    0        ; handle holder
  370.     DC.W    $51,$99,$65,$d3    ; t,l,b,r
  371.     DC.B    4        ; type
  372.     DC.B    2,'Ok'
  373.  
  374.     ; Item number 2
  375.     DC.L    0        ; handle holder
  376.     DC.W    $51,$35,$65,$6f    ; t,l,b,r
  377.     DC.B    4        ; type
  378.     DC.B    6,'Cancel'
  379.  
  380.     ; Item number 3
  381.     DC.L    0        ; handle holder
  382.     DC.W    $11,$1b,$45,$f3    ; t,l,b,r
  383.     DC.B    $88        ; type
  384.     DC.B    83,'Please confirm your choice to replace the '
  385.     DC.B    'current dictionary with the memory image.'
  386.  
  387.     ; Item number 4: the hdlg
  388.     DC.L    0        ; handle holder
  389.     DC.W    $FFFE,$FFFE,$FFFE,$FFFE    ; off screen rect
  390.     DC.B    $81,4
  391.     DC.W    1,259        ; helpItem,id of hdlg
  392.  
  393. .ALIGN    2
  394. RESOURCE    'PICT'    128
  395.     DC.W    $0160,$FFFF,$FFFF,$005D,$00A2,$1101,$A000,$82A1
  396.     DC.W    $0096,$000C,$0100,$0000,$0200,$0000,$0000,$0000
  397.     DC.W    $A100,$9A00,$08FF,$FC00,$0000,$3400,$0001,$000A
  398.     DC.W    $0000,$0000,$0011,$006B,$2C00,$0B00,$0208,$4E65
  399.     DC.W    $7720,$596F,$726B,$0300,$020D,$000C,$2E00,$0400
  400.     DC.W    $0001,$002B,$010C,$0F43,$6872,$6973,$2048,$6569
  401.     DC.W    $6C6D,$616E,$D573,$A000,$97A1,$0096,$000C,$0100
  402.     DC.W    $0000,$0200,$0000,$0000,$0000,$A100,$9A00,$0800
  403.     DC.W    $0200,$0000,$4D00,$0001,$000A,$002B,$0001,$0044
  404.     DC.W    $009E,$0D00,$0A2B,$0129,$1841,$6C74,$6572,$6E61
  405.     DC.W    $7469,$7665,$2070,$726F,$6772,$616D,$6D69,$6E67
  406.     DC.W    $0D2A,$0C17,$6C61,$6E67,$7561,$6765,$2066,$6F72
  407.     DC.W    $204D,$6163,$696E,$746F,$7368,$2EA0,$0097,$A100
  408.     DC.W    $9600,$0C01,$0000,$0002,$0000,$0000,$0000,$00A1
  409.     DC.W    $009A,$0008,$FFFC,$0000,$0043,$0000,$0100,$0A00
  410.     DC.W    $5000,$0000,$5C00,$8928,$005A,$0001,$1B76,$6572
  411.     DC.W    $7369,$6F6E,$2030,$2E36,$2E33,$2020,$2020,$2020
  412.     DC.W    $2037,$2f34,$2f39,$3320,$A000,$97A1,$0096,$000C
  413.     DC.W    $0100,$0000,$0200,$0000,$0000,$0000,$A100,$9A00
  414.     DC.W    $08FF,$F900,$0000,$4F00,$0001,$000A,$0010,$0000
  415.     DC.W    $002D,$00A1,$0D00,$1828,$0025,$0001,$0C50,$6F63
  416.     DC.W    $6B65,$7420,$466F,$7274,$68A0,$0097,$A000,$83FF
  417.  
  418. .ALIGN 2
  419. RESOURCE    'SIZE'    $FFFF
  420.     DC.W    %0101100011000000    ; $58C0    
  421.     DC.L    $00020000
  422.     DC.L    $00010000
  423.  
  424. INCLUDE    System7Resources.txt    ; color icons and balloon help
  425.  
  426.     END
  427.